92 SONGS

A visualisation of Fugazi history

This page offers a visualisation of the songs that Fugazi performed live using metadata from the Fugazi Live Series.

The raw data was processed previously and the results were stored in the the summary table of the Repeatr package. Here the summary data will be used without going into details of the data processing.

Let’s get the data, limit it to the columns that we will be using, and have a look at the first few rows.


mygraphdata <- summary %>%
  select(song, launchdate, chosen, release, rating)

head(mygraphdata)
#> # A tibble: 6 x 5
#>   song                 launchdate chosen release      rating
#>   <chr>                <date>      <dbl> <chr>         <dbl>
#> 1 bed for the scraping 1994-11-20    299 Red Medicine  1    
#> 2 reclamation          1990-05-05    594 Steady Diet   0.997
#> 3 break                1996-08-15    170 End Hits      0.996
#> 4 do you like me       1994-11-20    272 Red Medicine  0.968
#> 5 closed captioned     1997-06-18    158 End Hits      0.947
#> 6 cashout              2000-09-30     59 The Argument  0.938

Now let’s graph the data. The idea is to plot each song as a bubble, with the x-coordinate given by the launch date, and the y-coordinate given by the rating calculated from the choice modelling of the Fugazi Live Series data. The size of the bubble will be proportional to the number of times the song was played live, while the color of the bubble will indicate the associated release in the band’s discography. There will be a lot of information packed into this graph!


p <- mygraphdata %>%
  ggplot( aes(x=launchdate, y=rating, size = chosen, color=release, label=song)) +
  geom_point(shape = 1) +
  theme_bw()

ggplotly(p)

The graph is interactive:

Enjoy!